home *** CD-ROM | disk | FTP | other *** search
- ; $VER: Startup-Sequence_LD 40.3 (31.8.93)
- ; Startup-Sequence for low-density floppies
-
- ;Startup Sequence Example with Amiga to PC Pictures
-
- FastExec FASTRAM REBOOT
- C:SetPatch QUIET
- C:patchopenwb
- C:PatchControl
-
- PicBoot DH2:PC1 DETACH ;Here is the first Picture
-
- C:Version >NIL:
- C:AddBuffers >NIL: DF0: 15
- FailAt 21
-
- PicBoot DH2:PC2 DETACH ;The 2nd
-
- C:MakeDir RAM:T RAM:Clipboards RAM:ENV RAM:ENV/Sys
- C:Copy >NIL: ENVARC: RAM:ENV ALL NOREQ
-
- Resident >NIL: C:Assign PURE
- Resident >NIL: C:Execute PURE
-
- PicBoot DH2:PC3 DETACH ; 3rd
-
- Assign >NIL: ENV: RAM:ENV
- C:MCP
-
- PicBoot DH2:PC4 DETACH ; 4th
-
- run >nil: C:MagicWB-Demon 4,123,123,123 5,175,175,175 6,170,144,124 7,255,169,151 8,0,0,255 ; Don't remove this entry!
- Assign >NIL: T: RAM:T
- Assign >NIL: CLIPS: RAM:Clipboards
- Assign >NIL: REXX: S:
- Assign >NIL: PRINTERS: DEVS:Printers
- Assign >NIL: KEYMAPS: DEVS:Keymaps
- Assign >NIL: LOCALE: SYS:Locale
- Assign >NIL: LIBS: SYS:Classes ADD
- Assign >NIL: HELP: LOCALE:Help DEFER
-
- PicBoot DH2:PC5 DETACH ; 5th
-
- Assign Dopus5: DH3:Utilities/Opus5
- Assign GPFax: DH3:Programs/GPFax
- ;Assign RAILA: DH2:GAMES/RAILROAD
- ;Assign RDISKB: DH2:GAMES/RAILROAD
- ;Assign Bans1: DH2:GAMES/BANSHEE
- ;Assign Bans2: DH2:GAMES/BANSHEE
- ;Assign Bans3: DH2:GAMES/BANSHEE
- ;Assign Bans4: DH2:GAMES/BANSHEE
-
- PicBoot DH2:PC6 DETACH ; 6th
-
- ;PicBoot C:Boot/#?.iff DETACH PATCH DELAY 250
-
- PicBoot DH2:PC7 DETACH ; 7th
-
- Assign VWLHA: DH0:Virusworkshop/VWLHA
-
- PicBoot DH2:PC8 DETACH ; 8th
-
- ;IF NOT EXISTS SYS:L
- ; Assign >NIL: L: Extras3.1:L DEFER
- ;EndIF
-
- PicBoot DH2:PC9 DETACH ; 9th
-
- ;IF NOT EXISTS SYS:Fonts
- ; Assign FONTS:
- ;EndIF
-
- PicBoot DH2:PC10 DETACH ; 10th
-
- BindDrivers
- ;C:Mount >NIL: DEVS:DOSDrivers/~(#?.info)
- C:Mount >NIL: DEVS:DOSDrivers/CD0
-
- PicBoot DH2:PC11 DETACH ; 11th
-
- ;IF EXISTS DEVS:Monitors
- IF EXISTS DEVS:Monitors/VGAOnly
- DEVS:Monitors/VGAOnly
- EndIF
-
- PicBoot DH2:PC12 DETACH ; 12th
-
- C:List >NIL: DEVS:Monitors/~(#?.info|VGAOnly) TO T:M LFORMAT "DEVS:Monitors/%s"
- Execute T:M
- C:Delete >NIL: T:M
- EndIF
-
- PicBoot DH2:PC13 DETACH ; 13th
-
- SetEnv Language "english"
- SetEnv Workbench $Workbench
- SetEnv Kickstart $Kickstart
- UnSet Workbench
- UnSet Kickstart
-
- C:AddDataTypes REFRESH QUIET
-
- ;IF "`C:Avail TOTAL`" GE "1250000" VAL
- ; C:LoadResource LIBS:diskfont.library LIBS:iffparse.library LIBS:asl.library LIBS:commodities.library
-
- C:RndBG FROM=S:RndBG.config
- C:IPrefs
-
- ; IF NOT $Language EQ "english"
- ; CD LOCALE:Catalogs/$Language
- ; C:LoadResource Sys/workbench.catalog Sys/libs.catalog Sys/prefs.catalog Sys/commodities.catalog Sys/utilities.catal
-
- PicBoot DH2:PC14 DETACH ; 14th
-
- ; CD SYS:
- ; EndIF
- ;Else
- ; C:IPrefs
- ;EndIF
-
- PicBoot DH2:PC15 DETACH ; 15th
-
- C:ConClip
-
- PicBoot DH2:PC16 DETACH ; 16th
-
- Path >NIL: RAM: C: SYS:Utilities SYS:Rexxc SYS:System S: SYS:Prefs SYS:WBStartup SYS:Tools SYS:Tools/Commodities
-
- PicBoot DH2:PC17 DETACH PATCH DELAY 200 ;This is the delay for workbench
- ;to finish loading
- IF EXISTS S:User-Startup
- Execute S:User-Startup
- EndIF
- Resident Execute REMOVE
- Resident Assign REMOVE
- C:LoadWB
-
- WAIT 5 ;Delay for sound
-
- RUN >NIL: PLAY16 DH3:Sound/Wavs/AekEmpty.wav ;Here you can put a Windows
- ;sound with some delay
- ;to emulate the windows
- ;thems
- C:Newicons
-
- DH0:C/Shovecolors DH0:C/3.pal LOCKALL
- EndCLI >NIL:
-